(telnet-mode-map): Inherit from comint-mode-map.

diff --git a/lisp/telnet.el b/lisp/telnet.el
index 28884e11cd4e79a6eba60043335b9bb556486482..13a5e391a4a2bf564871ea37cf059e6f008bd713 100644 (file)
--- a/lisp/telnet.el
+++ b/lisp/telnet.el
@@ -101,7 +101,7 @@ rejecting one login and prompting again for a username and password.")
 ; initialization on first load.
 (if telnet-mode-map
     nil
-  (setq telnet-mode-map (copy-keymap comint-mode-map))
+  (setq telnet-mode-map (nconc (make-sparse-keymap) comint-mode-map))
   (define-key telnet-mode-map "\C-m" 'telnet-send-input)
 ;  (define-key telnet-mode-map "\C-j" 'telnet-send-input)
   (define-key telnet-mode-map "\C-c\C-q" 'send-process-next-char)